Option Explicit
'ۭqҲ
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    MsgBox "bTextBox1rX" & Chr(KeyAscii) & "QUF"
End Sub
